home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / WakeRace.dxr / Internal_12_Selection Screen.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  2.1 KB  |  95 lines
  1. property pCurrSelected, pLookup, pWidthSpeed, pWidthAccel, pWidthCornering
  2. global gPlayer, gCarList
  3.  
  4. on beginSprite
  5.   pLookup = [#kane, #stoneCold, #rock, #undertaker]
  6.   pCurrSelected = 1
  7.   pWidthSpeed = 0
  8.   pWidthAccel = 0
  9.   pWidthCornering = 0
  10.   resetMenu()
  11. end
  12.  
  13. on enterFrame
  14.   updateStats()
  15.   updateDriver()
  16.   updateTruck()
  17. end
  18.  
  19. on exitFrame me
  20.   go(the frame)
  21. end
  22.  
  23. on selectCar me
  24.   gPlayer.setCar(pLookup[pCurrSelected])
  25.   go("Game")
  26. end
  27.  
  28. on moveLeft me
  29.   pCurrSelected = pCurrSelected - 1
  30.   if pCurrSelected < 1 then
  31.     pCurrSelected = 4
  32.   end if
  33.   resetMenu()
  34.   puppetSound(1, "guyDown")
  35. end
  36.  
  37. on moveRight me
  38.   pCurrSelected = pCurrSelected + 1
  39.   if pCurrSelected > 4 then
  40.     pCurrSelected = 1
  41.   end if
  42.   resetMenu()
  43.   puppetSound(1, "guyDown")
  44. end
  45.  
  46. on resetMenu
  47.   sprite(6).width = 33
  48.   sprite(6).height = 0
  49.   sprite(6).member = member(string(pLookup[pCurrSelected]) & "Car")
  50.   sprite(7).locH = 673
  51.   sprite(7).member = member(string(pLookup[pCurrSelected]) & "Wrestler")
  52.   speed = gCarList[pLookup[pCurrSelected]].speed
  53.   pWidthSpeed = 80 - (speed / 8.0 * 80.0)
  54.   accel = gCarList[pLookup[pCurrSelected]].accel
  55.   pWidthAccel = 80 - (accel * 80.0)
  56.   cornering = gCarList[pLookup[pCurrSelected]].cornering
  57.   pWidthCornering = 80 - (cornering / 8.0 * 80.0)
  58. end
  59.  
  60. on updateDriver
  61.   if sprite(7).locH > 533 then
  62.     sprite(7).locH = sprite(7).locH - 10
  63.   end if
  64. end
  65.  
  66. on updateTruck
  67.   if sprite(6).width < 154 then
  68.     sprite(6).width = sprite(6).width + 11
  69.   end if
  70.   if sprite(6).height < 121 then
  71.     sprite(6).height = sprite(6).height + 11
  72.   end if
  73. end
  74.  
  75. on updateStats
  76.   if sprite(10).width < pWidthSpeed then
  77.     sprite(10).width = sprite(10).width + 3
  78.   end if
  79.   if sprite(10).width > pWidthSpeed then
  80.     sprite(10).width = sprite(10).width - 3
  81.   end if
  82.   if sprite(11).width < pWidthAccel then
  83.     sprite(11).width = sprite(11).width + 3
  84.   end if
  85.   if sprite(11).width > pWidthAccel then
  86.     sprite(11).width = sprite(11).width - 3
  87.   end if
  88.   if sprite(12).width < pWidthCornering then
  89.     sprite(12).width = sprite(12).width + 3
  90.   end if
  91.   if sprite(12).width > pWidthCornering then
  92.     sprite(12).width = sprite(12).width - 3
  93.   end if
  94. end
  95.